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IDENTIFICATION 

PRODUCT CODE: AC~E481A-MC 

PRODUCT NAME: CZTUMAO TMO2/TU45S UTILITY DRIVER 
DATE CREATED: 25 MAY 1978 

MAINTAINER: COMPUTER SPECIAL SYSTEMS 

AUTHOR: R. B. BARNES/R. J. COLLINS 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO 
CHANGE WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED 
AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION. 
DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN 
THIS MANUAL. 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS 
FURNISHED TO THE PURCHASER UNDER A LICENSE FOR USE 
ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED 
(WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 
OTHERWISE BE PROVIDED IN WRITING BY DIGITAL. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR THE USE OR RELIBILITY OF ITS 
arta ON EQUIFMENT THAT IS NOT SUPPLIED BY 


COPYRIGHT (@) 1975, 1976, 1977, 1978 BY DIGITAL EQUIPMENT CORPORATION 
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ABSTRACT 


THIS PROGRAM IS INTENDED AS A BRUTE FORCE ROUTINE 

TO EXECUTE AN OPERATION OR SERIES OF OPERATIONS, CONTINUOUSLY 
REGARDLESS OF THE RESULTS OF THE OPERATION. BECAUSE 
OF THE COMPLEXITY OF THE TU45 MAG TAPE SYSTEM AS 
OPERATED ON THE MASSBUS. IT IS NOT ALWAYS POSSIBLE TO 
PROVIDE FOR EVERY CONTINGENCY IN THE NORMAL PROGRAMS. 
THEREFORE THIS UTILITY DRIVER WILL ALLOW AN OPERATOR 
TO EXECUTE ANYTHING DESIRED IN ANY ORDER. THERE ARE 
NO ERROR CHECKS OR PRINTOUTS MADE, AND ANY VARIATION 
FROM PRESET SEQUENCES AND VALUES ARE MADE BY 

CHANGING THE APPROPIATE MEMORY LOCATIONS. 


REQUIREMENTS 


HARDWARE : 


A. ANY PDP-11 PROCESSOR 

B. RH MASSBUS CONTROLLER 

C. TMO2 MAG TAPE CONTROLLER 

D. AT LEAST ONE (1) TU45 SLAVE 


STORAGE : 
THIS PROGRAM REQUIRES AT LEAST 1K OF CORE 
LOADING PROCEDURE: 


USE STANDARD BINARY LOADING PROCEDURE 
STARTING PROCEDURE 


THE PROGRAM IS ALWAYS STARTED AT LOCATION 200 (8) 
CONSOLE SWITCH SETTINGS 


IF A CONSOLE SWITCH REGISTER IS NOT PRESENT, THE FOLLOWING 
PROCEDURE MUST BE IMPLEMENTED 

A) LOAD ADDRESS a, LABELLED “*SWR"’ 

B) DEPOSIT THE VALUE 176(8) 

C) LOAD ADDRESS 176(8) 

D) DEPOSIT THE DESIRED SWITCH VALUE. 


SW15: 1=STOP AFTER EACH OPERATION 
O=PROCEED 

SW14: 1=STOP AT THE END OF THE OPERATION SEQUENCE 
O=PROCEED 

SW13: 1=IGNORE END OF TAPE (EOT) 


SEQ 00035 
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O=REWIND AT END OF TAPE (EOT) 


TUSS UTILITY DRIVER 
CZTUMA.P11 


(PAGE 2) 
OPERATION 


THE PROGRAM OPERATION IS QUITE SIMPLE, BUT DOES 
REQUIRE THE OPERATOR TO HAVE KNOWLEDGE OF THE 
TU4S TAPE SYSTEM AS OPERATED ON THE RH MASSBUS 
CONTROLLER. THE OPERATOR MUST BE ABLE TO DECIDE 
WHICH SEQUENCE OF OPERATION IS REQUIRED, AND 
WHAT VALUES TO ASSIGN TO THE VARIOUS PARAMETERS 
REQUIRED TO EXECUTE THEM. THE OPERATION SEQUENCE 
IS SET UP BY LOADING A TABLE WITH THE FUNCTION 
CODES OF THE DESIRED OPERATIONS AND SETTING THE 


NUMBER OF OPERATIONS IN A COUNTER. THE PROGRAM IS 


SET UP TO DO A WRITE OF TEN (8) WORDS OF ALL 
ONES DATA TO SLAVE ZERO (0) ON DRIVE ZERO (0) IN 
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PE (1600 BPI) WITH A NINE TRACK NORMAL DATA FORMAT. 


THE DATA ADDRESS IS 3000 (8). 
IS SET TO DO A SINGLE WRITE. 


THE OPERATION SEQUENCE 
IF LOADED AND STARTED 


AT 200 (8) WITH NO CHANGES MADE AND SWITCH 14 AND 15 
SET TO A ZERO (0), THIS OPERATION WILL BE EXECUTED 


CONTINUOUSLY. 


THE FOLLOWING IS THE LIST OF PARAMETERS WHICH MAY 
BE VARIED AND A DESCRIPTION OF EACH ALONG WITH THEIR 


CORE LOACATION: 


PARAMETER LOCATION 
RH ADDRESS 600 
DRIVE NUMBER 700 


UNIT DESCRIPTION 702 


DESCRIPTION 


ADDRESS OF RH (THE FIRST REGISTER ADDRESS: CS1) 
SET TO SELECT TMO2 NUMBER ADDRESS 0-7 


SET SELECTED SLAVE NUMBER (0-7) IN BITS 0.1.2 
SELECT PARITY IN BIT 3 (O=0DD 1=EVEN) 

SELECT DATA FORMAT IN BITS 4,5,6.7 

SELECT DENSITY IN BITS 8,9,10 


SET NUMBER OF FRAMES TO WRITE PER WORD COUNT AND FORMAT 


SET NUMBER OF WORDS TO BE TRANSFERRED IN TWOS* COMPLIMENT 


SET DESIRED ADDRESS FOR START OF READ BUFFER. 
SET DESIRED ADDRESS FOR START OF WRITE BUFFER. 


FRAME COUNT 704 
IN TWOS* COMPLIMENT 
WORD COUNT 706 
READ ADDRESS 710 
WRITE ADDRESS 712 
READY DELAY 714 


THIS DELAY VALUE IS USED BY THE PROGRAM TO ESTABLISH 


A MAXIMUM TIME TO AWAIT THE COMPLETION OF AN OPERATION 
BEFORE PROCEEDING TO THE NEXT. **(DEFAULT IS APPROX 4355 MS FOR PDP-11/20)** 


READY MULTIPLIER 716 


IF THE VALUE SET INTO 714 DOES NOT ALLOW ENOUGH TIME, 
INCREASE THE SIZE OF THE MULTIPLIER. 


EACH INCREMENT OF THE 


MULTIPLIER WILL CAUSE THE 714 DELAY TO BE EXECUTED 


THAT MANY MORE TIMES. 


SEQ 0C05 
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OPERATION DELAY 720 


OPER MULTIPLIER (722 
OPERATION NUMBER 724 


OPERATION TABLE ~~ 726-756 


FUNCTION CODES 


20=READ IN PRESET 
O2=REWIND-OFF LINE 
06=REWIND 

10=DRIVE CLEAR 
26=WRITE TAPE MARK 
24=ERASE 

30=SPACE FORWARD 
32=SPACE REVERSE 
SO=WRITE CHECK FORWARD 
S6=WRITE CHECK REVERSE 
60=WRITE FORWARD 
70=READ FORWARD 
76=READ REVERSE 
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THIS DELAY IS USED TO ALLOW FOR SOME AMOUNT OF 

TIME BETWEEN THE EXECUTION OF EACH OPERATION. IT IS 
LOADED AND USED JUST AS IN THE READY DELAY(714) 
**(DEFAULT IS APPROX 54 MS FOR PDP-11/20)** 


THIS IS USED JUST AS THE READY DELAY MULTIPLIER(716) 


THIS IS THE NUMBER OF OPERATIONS TO BE PERFORMED 
IN A SEQUENCE AND SHOULD REFLECT THE NUMBERS 
OF OPERATIONS SET INTO THE OPERATION TABLE. 


THIS TABLE (CONSISTING OF 15 LOCATIONS) IS TO BE 

LOADED WITH THE FUNCTION CODES FOR EACH OPERATION 

TO BE PERFORMED IN SEQUENCE. THE NUMBER OF ENTIRES 

MAY BE FROM ONE (1) TO FIFTEEN (15). MAKE SURE THAT 

THE NUMBER OF FUNCTION CODES SET IN THE TABLE IS REFLECTED 
BY THE NUMBER IN LOCATION 724 (OPNUM) 


SEQ 0007 
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(PAGE 4) 
DATA FORMATS (BIT 7.6.5.4 OF UNIT DESCRIPTION) 


14=NINE TRACK NORMAL: 2 FRAMES PER WORD 
15=CORE DUMP: ~4 FRAMES PER WORD 


DENSITY (BITS 10,9,8 OF UNIT DESCRIPTION) 
4=1600 BPI:PE (PE USES ONLY ODD PARITY) 
3=800 BPI:NRZI 

2=800 BPI:NRZI 

1=556 BPI:NRZI 

0=200 BPI:NRZI 

PARITY (BIT 3 OF UNIT DESCRIPTION) 


1=EVEN PARITY 
O=ODD PARITY 


SLAVE SELECT (BITS 2.1,0 OF UNIT DESCRIPTIONS) 
SET TO DEVICE SLAVE ADDRESS (0-7) 
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Vs PROGRAM DESCRIPTION 


IN ORDER TO MAINTAIN THE CONTINUOUS EXECUTION OF 
pa — DESCRIBED THE PROGRAM IS ORGANIZED AS 
LL : 


START 

INITIALIZE THE RH 

SET UP TAPE PARAMETERS (DENSITY, PARITY, FORMAT: WORD COUNT, FRAME COUNT, BUS ADDRESS) 
SELECT DEVICE TO TEST (DRIVE NUMBER, SLAVE NUMBER) 

EXECUTE OPERATION (SET FUNCTION AND FROM OP TABLE AND SET GO=1) 
AWAIT END OF OPERATION (READY DELAY) 

STOP IF SWITCH 15=1 

DO OPERATION DELAY (OP DELAY) 

STOP IF LAST OPERATION IN SEQUENCE AND SWITCH 14=1 

POINT TO NEXT FUNCTION CODE IN OP TABLE 

JUMP BACK TO START 


7.1 FLOW: START: HOUSEKEEPING 
INIT: CLEAR MASSBUS AND TMO2 
SET UP: SET UP REQUIRED REGISTERS 
EXECUTE: SET FUNCTION AND GO=1 
AWAIT END: _ LOOP ON DRY=1 AS LONG AS ALLOWED BY READY DELAY 
STOP: IF SWITCH 15=1 


DELAY: PER OP DELAY 

END OF RSEQUENCE? IF NOT JUMP TO START 
STOP: IF SWITCH 14=1 

JUMP TO START RESTART SEQUENCE 


7.2 VARIATIONS: THERE ARE TWO VARIATIONS MADE FROM THIS FLOW. 

BOTH ARE CAUSED BY A PARITCULAR FUNCTION CODE. 

IF A READ REVERSE IS TO BE EXECUTED, THEN THE 

BUS ADDRESS IS INCREMENTED BY THE SIZE OF THE 

RECORD BECAUSE THE DATA IS LOADED INTO MEMORY 

IN REVERSE (I.E: HIGH ADDRESS TO LOW ADDRESS) 

THE SECOND VARIATION IS CAUSED BY A SPACE (FORWARD OR REVERSE) 
OPERATION AND IT IS THAT THE FRAME COUNTER IS SET TO A -1 

SO THAT ONLY ONE (1) RECORD IS SPACED OVER. IF YOU vis 

TO SPACE OVER MORE THAT ONE (1) RECORD, SET LOCATION 1100 (8) 
TO THE TWOS' COMPLIMENT OF THE NUMBER OF RECORDS DESIRED. 


8. LISTING 
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288 LIST SEQ,LOC,BIN 

289 TITLE TU4S UTILITY DRIVER 
290 : CZTUMAO 

291 725 MAY 1978 

344 :R. BARNES/R. J. COLLINS 
294 .ENABL ABS 

295 

be CONSOLE SWITCHES 
298 :SW 15=1 STOP ON EACH OPERATION 
299 : 0 CONTINUE 

300 :SW 14=1 STOP AT END OF SEQUENCE 
301 : 0 CONTINUE 

302 :SW 13=1 IGNORE END OF TAPE (EOT) 
ar ; 0 REWIND AT END OF TAPE (EOT) 
a REGISTER EQUIVES 
307 000000 RO=%0 
308 000001 R1=%1 
30 000002 R2=%2 
310 000003 R3=23 

11 000004 R4=%4 
312 000005 R5=25 

313 000006 SP=%6 
S65 000007 PC=%7 

a | STARTING ADDRESS 

318 000200 -=200 

319 000200 000167 001100 JMP SETUP 

$54 000600 » =600 

35 sTMO2 REGISTERS 

324 000600 172440 C1: 172440 

325 000602 172442 " ME: 172442 

326 000604 172444 BA 172444 

327 000606 172446 FC 172446 

328 000610 172450 cs 172450 

329 000612 172452 DS 172452 

330 172454 ER 172454 

331 000616 172456 AS 172456 

332 000620 172460 cc 172460 

333 000622 172462 DB 172462 

000624 172464 MR 172464 

335 172466 DT 172466 

336 000630 172470 SN: ~— 172470 

337 000632 172472 C2: 172472 

tin :PROCESSOR ADDRESSES 

341 000634 177776 PSW: 177776 PROCESSOR STATUS 
342 000636 177570 Swe: 177570 :SWITCH REGISTER 
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344 000700 
345 
346 
347 0007 000000 
348 000702 002300 
349 000704 177760 
350 000706 177770 
351 000710 002000 
352 000712 003000 
353 000714 100000 
354 000716 000001 
355 000720 010000 
356 000722 000001 
357 000724 000001 
358 
359 
360 
361 
362 
363 
364 
365 
366 
367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378. 

379 

380 

381 000726 000060 
382 000730 000000 
383 000732 000000 
384 000734 000000 
385 0007 000000 
386 000740 000000 
387 000742 000000 
388 000744 00000 

389 000746 000000 
390 000750 000000 
391 000752 00000 

392 000754 000000 
3a 000756 000000 
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OPTBL: 


-=700 
:SET PARAMETERS DESIRED FOR UNIT UNDER TESTeeeee« 


;DRIVE NUMBER 

>SLAVE DESCRIPTION 

FRAME COUNT 

;WORD COUNT 

sREAD ADDRESS 

sWRITE ADDRESS 

sREADY DELAY 

sREADY DELAY MULTIPLIER 
[OPERATION DELAY 

;OPERATION DELAY MULTIPLIER 
:NUMBER OF OPERATION (1 TO 15) 


sOPERATION TABLEtttteerene 

sENTER OPERATION SEQUENCE DESIRED. 
sMUST HAVE AT LEAST 1 OPERATION, AND 
MAY HAVE UP TO 15(8). 

;SET THE OPERATION COUNTER EQUAL 

;TO THE NUMBER OF OPERATIONS IN 


L 
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:THE SEQUENCE. 


Soooo°ooo°o°o°o°odo 


READ IN PRESET 
REWIND 


CLEAR 


TAPE MARK 


FORWARD 
REVERSE 
CHECK FORWARD 
CHECK — 


WRITE FORWAR 
READ FORWARD 
READ REVERSE 


sFILL WITH OPERATION SEQUENCE 


SEQ 0011 
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396 001000 -=1000 
44 zSTART OF PROGRAMetereeeree 
399 001000 012706 000500 START: MOV #500.SP 
400 001004 012777 000340 177622 MOV #340 ,aPSw 
401 001012 016700 177706 MOV OPNUM RO SET COUNTER 
402 001016 .012701 000726 MOV #OPTBL ,R1 ;SET POINTER 
403 001022 012777 000040 177560 A: MOV #40,aCS : INIT 
404 001030 016777 177644 177552 MOV DRVN,aCS sDRIVE NUMBER 
405 001036 016777 177640 177566 MOV UDES .aC2 ;UNIT DESCRIPTION 
406 001044 016777 177636 177530 MOV WCNT ,awc sWORD COUNT 
407 001052 016777 177626 177526 MOV FCNT ,aFC FRAME COUNT 
408 001060 012102 MOV (R1)+,R2 SET OP CODE 
409 001062 022702 000030 CMP #30,R2 ;SEE IF SPACE FORWARD 
410 001066 001403 BEQ AA ;1F SO: BR 
411 001070 022702 000032 7 . CAP #32 ,R2 :SEE IF SPACE REVERSE 
412 001074 001003 BNE AO :1f NOT: BR 
415 001076 012777 177777 177502 AA: MOV #-1,aFC :SET TO SPACE ONE RECORD 
414 001104 022702 000060 AQ: CMP #60,R2 ;SEE IF READ OP 
415 001110 103404 BLO Al :IF SO: BR 
416 001112 016777 177574 177464 MOV WADDR ,@BA ;SET WRITE ADDRESS 
417 001120 000413 BR & 
418 001122 016777 177562 177454 Al: MOV RADDR ,@BA ;SET READ ADDRESS 
419 001130 022702 000070 CMP #70,R2 ;SEE IF READ OPERATION 
420 001134 001405 BEQ A3 IF SO: BR 
421 001136 016703 177542 MOV FCNT,RS :GET FRAME COUNT 
422 001142 005403 NEG R3 
423 001144 060377 177434 ADD R3,aBA ;SET BUS ADDRESS FOR READ REVERSE 
424 001150 052702 000001 A3: BIS #1,R2 SC, :SET GO BIT 
425 001154 000240 NOP 
426 001156 000240 NOP 
427 001160 010277 177414 MOV R2,ac » START OPERATION 
428 001164 000240 NOP 
429 001166 000240 NOP 
430 001170 016704 177522 MOV RDYDX ,R4 ;SET DELAY MULTIPLIER 
431 001174 016703 177514 BO: MOV RDYDLY ,R3 ;SET READY DELAY 
432 001200 032777 000200 177404 B: BIT #200,aDS 
433 001206 001005 BNE C IF DRY: BR 
434 001210 005303 DEC R3 
435 001212 001372 BNE B 
436 001214 005304 . DEC R4 
437 001216 001366 BNE BO ;DELAY FOR DRIVE READY 
438 001220 000240 NOP 
439 001222 005777 177410 C: TST @aSWR ;SEE IF STOP ON OPERATION 
440 001226 100001 BPL D ;1F NOT: BR 
441 001230 000000 HALT 
442 0012 D NOP 
443 001234 000240 NOP | 
444 001236 016704 177460 MOV OPDX,R4 ;SET DELAY MULTIPLIER 
445 001242 016705 177452 EQ: MOV OPDLY,R3 ;SET OPERATION DELAY 
446 001246 005305 Es oec. 3 
447 001250 001376 oe : £ 
448 001252 005304 DEC R4 
449 001254 001572 BNE EO sDELAY BETWEEN OPERATIONS 
450 001256 004767 000056 JSR PC ,RWND :GO SEE IF REWIND 
451 001262 005300 DEC RO | 
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001256 


032777 
001641 


000000 
000167 


000167 


032777 


000207 


002000 
000100 


003000 
000100 


000001 


MACY11 3041046) 
si, ae 


040000 


177474 


177440 


020000 
002000 
000040 


000200 
020000 


177342 


177342 


177270 
177234 
177222 


177174 
177164 
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SETUP: 


SETA: 


RWNDA: 
RWNDB: 


RWNDX: 


BNE 


& 
eo 


START 
START 


SEQ 0013 


;IF SEQUENCE NOT DONE: BR 
>SEE IF HALT ON SEQUENCE 


REGISTER SETUPteeeceeere 


C1,R1 GET ADDRESS OF CS1 | 
#15,RO ;SET NUMBER OF REGISTERS 
#WC .R2 GET FIRST ADDRESS 

#2.R1 ; INCREMENT 

R1,(R2)+ LOAD ADDRESS 

RO ;SEE IF DONE 

SETA IF NOT: BR 

START ELSE GO START EXECUTION 
FROM EOT (PER SW13) 

#20000,aSwR =; SEE_IF IGNORE EOT 
RWNDX O: BR 

#2000.aDs Se IF AT EOT 

RWNDX NOT: BR 

#40,aCs Ing 

DRVN.aCcs SEY DRIVE NUMBER 

UDES ,aC2 ;SET SLAVE NUMBER 

#7,aC1 ;START REWIND 

#200,aDS {SEE IF ORY 

RWNDA ;1F NOT: BR 

#20000, aDS SEE IF PIP RESET 

RWNDB ;1F NOT: BR 

(SP) + ZRESET STACK 

START ;RESTART SEQUENCE 

PC ; RETURN 

100 

100 , 
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a 001022 
AA 001076 
AS 16 
AQ 1104 
Al 001122 
A3 001150 
8 001200 
BA 

BO 001174 
C 001222 
- ABS. 003200 


ERRORS DETECTED: 


000 


0 


,CZTUMA.SEQ/SOL_CZTUMA.P11 
ME: 2 4 .2 SECONDS 


RUN-TI 
RUN-TIME 
CORE USED: 


“RATIO: 9/7=1.3 


5K (10 PAGES) 


001246 
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709 SYMBOL TABLE 


0 
000634 


2 


000710 


0 
000630 


SEQ 0014 


